home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / mac / Chapter Tutorials / ch06.Media / ShapesPatterns / Shapes / shapes.dcr / 00020.ls < prev    next >
Encoding:
Text File  |  1996-11-26  |  191 b   |  9 lines
  1. on mouseDown
  2.   if the filled of member "filledCast" = 1 then
  3.     set the filled of member "filledCast" to 0
  4.   else
  5.     set the filled of member "filledCast" to 1
  6.   end if
  7.   updateStage()
  8. end
  9.